-- card: 6625 from stack: in
-- bmap block id: 7097
-- flags: 4000
-- background id: 2238
-- name: Part of Area Betw. 2 Circles
----- HyperTalk script -----
on mouseUp
  set numberFormat to <0.000000>

  --Calculate Arc AB
  get (pi*card field "Large Radius"/180)*card field "Degrees"
  put it into card field "Arc AB"

  --Calculate Arc DE
  get (pi*card field "Small Radius"/180)*card field "Degrees"
  put it into card field "Arc DE"

  --Calculate Segment Perimeter
  get card field "Arc AB"+card field "Arc DE" +(2*(card field "Large Radius"-card field "Small Radius"))
  put it into card field "Segment Perimeter"

  --Calculate Segment Area
  --k figured first
  get (card field "Arc AB"+card field "Arc DE")/2
  put it into memk
  get memk*(card field "Large Radius"-card field "Small Radius")
  put it into card field "Segment Area"
end mouseUp


-- part 1 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=312 top=98 right=116 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Small Radius


-- part 2 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=312 top=119 right=137 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Large Radius


-- part 3 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=312 top=140 right=158 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Degrees


-- part 4 (field)
-- low flags: 01
-- high flags: 0004
-- rect: left=296 top=185 right=205 bottom=443
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Arc AB


-- part 5 (field)
-- low flags: 01
-- high flags: 0004
-- rect: left=296 top=208 right=228 bottom=443
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Arc DE


-- part 6 (field)
-- low flags: 01
-- high flags: 0004
-- rect: left=296 top=240 right=260 bottom=443
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Segment Perimeter


-- part 7 (field)
-- low flags: 01
-- high flags: 0004
-- rect: left=296 top=275 right=295 bottom=443
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Segment Area


-- part contents for card part 2
----- text -----
.500000

-- part contents for card part 1
----- text -----
.250000

-- part contents for card part 3
----- text -----
90.000000

-- part contents for card part 4
----- text -----
0.785398

-- part contents for card part 5
----- text -----
0.392699

-- part contents for card part 6
----- text -----
1.678097

-- part contents for card part 7
----- text -----
0.147262